Indicates how the message has been prepared.
Syntax:
Returns:
Returns a numeric value indicating the prepared type. See Mail Message Format Type.
Example:
Dim oEdiDoc As Fredi.ediDocument
Dim oMailDocument As Fredi.mailDocument
Dim oMessage As Fredi.mailMessage
Dim ePreparedType As Fredi.MailMessagePreparedTypeConstants
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get internet mail document object
Set oMailDocument = oEdiDoc.GetMailDocument
' Load the mail document
oMailDocument.Load App.Path & "\SampleMail.TXT"
' Get the message.
Set oMessage = oMailDocument.GetMessage
ePreparedType = oMessage.PreparedType
Select Case ePreparedType
Case MailMsgPrepared_Encoded
MsgBox "Prepared Type. Encoded"Case MailMsgPrepared_SignedData
MsgBox "Prepared Type. SignedData"Case MailMsgPrepared_EnvelopedData
MsgBox "Prepared Type. EnvelopedData"Case MailMsgPrepared_AuthenticatedData
MsgBox "Prepared Type. AuthenticatedData"Case MailMsgPrepared_MultPartSigned
MsgBox "Prepared Type. MultPartSigned"Case MailMsgPrepared_MultPartEncrypted
MsgBox "Prepared Type. MultPartEncrypted"Case MailMsgPrepared_CompressedData
MsgBox "Prepared Type. CompressedData"Case Else
MsgBox "Prepared Type. None"End Select